﻿Public Class Observable(Of L As Listener)

    Private listeners As New List(Of L)

    Public Sub addListener(ByRef listener As L)
        listeners.Add(listener)
    End Sub

    Public Sub removeListener(ByRef listener As L)
        listeners.Remove(listener)
    End Sub

    Public Function getListeners() As List(Of L)
        Return listeners
    End Function


End Class
